(desktop-read): Run `desktop-not-loaded-hook' in the directory where the desktop
authorJuanma Barranquero <lekktu@gmail.com>
Sun, 24 Jun 2007 20:00:02 +0000 (20:00 +0000)
committerJuanma Barranquero <lekktu@gmail.com>
Sun, 24 Jun 2007 20:00:02 +0000 (20:00 +0000)
commitd4ff2434fd6a1eea6e6a2a9a466f5c236a64ad74
tree55a52aa24c8d13c22b884f7ee68a32c00c7a768c
parentc439c554ab8b78e9360cb75186fec7049ec44be4
(desktop-read): Run `desktop-not-loaded-hook' in the directory where the desktop
file was found, as the docstring says.
(desktop-kill): Use `read-directory-name'.
 (desktop-load-locked-desktop): New option.
(desktop-read): Use it.
(desktop-truncate, desktop-outvar, desktop-restore-file-buffer): Use `when'.
(desktop-save-mode-off): New function.
(desktop-base-lock-name, desktop-not-loaded-hook): New variables.
(desktop-full-lock-name, desktop-file-modtime, desktop-owner,
desktop-claim-lock, desktop-release-lock): New functions.
(desktop-kill): Tell `desktop-save' that this is the last save.
Release the lock afterwards.
(desktop-buffer-info): New function.
(desktop-save): Use it.  Run `desktop-save-hook' where the doc says to.
Detect conflicts, and manage the lock.
(desktop-read): Detect conflicts.  Manage the lock.
lisp/desktop.el